home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
findaf1a
/
module.bas
< prev
next >
Wrap
BASIC Source File
|
1999-09-05
|
344b
|
9 lines
Attribute VB_Name = "Module"
' The actual File Finding stuff
' works on nt4, win9x, and other 32bit platforms
Option Explicit
Global Const CB_ERR = -1
Global Const CB_FINDSTRING = &H14C
Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long